home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
MacHack 1994
/
MacHack 1994.toast
/
MacHack™94
/
Talks & Papers
/
Timothy Knox
/
yerk 3.66
/
Supplement
/
Unsupported
/
Utilities
/
iwCtl
< prev
next >
Wrap
Text File
|
1994-06-24
|
637b
|
32 lines
\ iwtest -- Imagewriter test words
\ 24-Jan-85 SSG
decimal
( cn ... c0 n -- ) \ Sends n characters to printer.
: printChars 0 DO pemit LOOP ;
\ Extended -- 9 chars per inch.
: extended 110 27 2 printChars ;
\ Pica -- 10 chars per inch.
: pica 78 27 2 printchars ;
\ Elite -- 12 chars per inch.
: elite 69 27 2 printChars ;
\ Pica proportional.
: picaProp 112 27 2 printChars ;
\ Elite proportional.
: eliteProp 80 27 2 printChars ;
\ Semicondensed (13.4/in)
: semiCond 101 27 2 printChars ;
\ Condensed (15/in).
: condensed 113 27 2 printChars ;
\ Ultracondensed (17/in.)
: ultraCond 81 27 2 printChars ;